/*
Topline Report Replication File
Lee Hannah 2.14.2016

Email: plutzer@psu.edu; lee.hannah@wright.edu 

Suggested citation:
Eric Plutzer, A. Lee Hannah, Joshua Rosenau, Mark S.McCaffrey, Minda Berbeco, 
Ann H. Reid. 2016. Mixed Messages: How Climate is Taught in America�s Schools.
Oakland, CA: National Center for Science Education.
http://ncse.com/files/MixedMessages.pdf


Based on survey report originally published:
Plutzer, Eric, Mark McCaffrey, A. Lee Hannah, Joshua Rosenau, Minda Berbeco,
and Ann H. Reid. 2016. "Climate change education in U.S. Middle and High schools." Science

*/


clear 
**
** Read in data-- need to set path file name

*cd "PATH FILE NAME HERE"

use "Climate_Confusion_Replication_February2016_Release.dta"


*******************************************************************
*******************************************************************
** Table 1. Formal class hours devoted to recent global warming
*******************************************************************
*******************************************************************

tab subject

gen q1_taughtgw = .
replace q1_taughtgw = 0 if q1_globalwarm == 1
replace q1_taughtgw = 1 if q1_globalwarm >1

label var q1_taughtgw "Teacher taught global warming" 

label define q1_gw 0 "No"
label define q1_gw 1 "Yes", add
label values q1_taughtgw q1_gw

** What percentage of teachers covered global warming by subject

tab subject q1_taughtgw [aweight = anal_wt], row  

/*
     1 bio; 2 |
        earth |
   science; 3 |
   physics; 4 | Teacher taught global
     chem ; 5 |        warming
middle school |        No        Yes |     Total
--------------+----------------------+----------
      biology |  55.76169  366.33646 |422.098154 
              |     13.21      86.79 |    100.00 
--------------+----------------------+----------
earth science | 4.2757583  91.711788 | 95.987546 
              |      4.45      95.55 |    100.00 
--------------+----------------------+----------
      physics | 125.97773  123.68219 | 249.65992 
              |     50.46      49.54 |    100.00 
--------------+----------------------+----------
    chemistry |  77.37021   90.89923 | 168.26944 
              |     45.98      54.02 |    100.00 
--------------+----------------------+----------
middle school | 165.19256  398.79238 | 563.98494 
              |     29.29      70.71 |    100.00 
--------------+----------------------+----------
        Total | 428.57795  1,071.422 |     1,500 
              |     28.57      71.43 |    100.00 

*/


** Constructing number of hours taught variable.
gen q1_num_globalwarm = q1_globalwarm


**** MULTIPLE PUNCH RESPONDENTS INDICATED ON VERIFICATION LOGS
** SRCID=="12644" scored 1 and 4 (none and 6-10) but answered extensively on Q3
replace q1_globalwarm = 4 if SRCID=="12644" 


foreach var of varlist q1_num_globalwarm*{
recode `var' 1 = 0
recode `var' 2 = 1.5
recode `var' 3 = 4
recode `var' 4 = 8
recode `var' 5 = 13
recode `var' 6 = 18
recode `var' 7 = 25
}
replace q1_num_globalwarm = 4 if q1_globalwarm == 3


** Mean for Hours Taught
tabstat q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1, by(subject)

/*
      subject |      mean
--------------+----------
      biology |  4.156283
earth science |  6.030772
      physics |  4.059772
    chemistry |  3.486295
middle school |  4.425481
--------------+----------
        Total |  4.348801
-------------------------
*/

** Median for hours taught
* Middle School
summarize q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1 & subject == 5, detail

/*

                      q1_num_globalwarm
-------------------------------------------------------------
      Percentiles      Smallest
 1%          1.5            1.5
 5%          1.5            1.5
10%          1.5            1.5       Obs                 395
25%          1.5            1.5       Sum of Wgt.  389.436965

50%          1.5                      Mean           4.425481
                        Largest       Std. Dev.      4.828498
75%            4             25
90%            8             25       Variance        23.3144
95%           18             25       Skewness       2.389713
99%           25             25       Kurtosis        8.72807
*/

* Earth Science
summarize q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1 & subject == 2, detail

/*
                      q1_num_globalwarm
-------------------------------------------------------------
      Percentiles      Smallest
 1%          1.5            1.5
 5%          1.5            1.5
10%          1.5            1.5       Obs                 265
25%          1.5            1.5       Sum of Wgt.  89.7273634

50%            4                      Mean           6.030772
                        Largest       Std. Dev.      5.777506
75%            8             25
90%           13             25       Variance       33.37958
95%           18             25       Skewness       1.722274
99%           25             25       Kurtosis       5.582547

*/

* Biology
summarize q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1 & subject == 1, detail

/*
                      q1_num_globalwarm
-------------------------------------------------------------
      Percentiles      Smallest
 1%          1.5            1.5
 5%          1.5            1.5
10%          1.5            1.5       Obs                 261
25%          1.5            1.5       Sum of Wgt.  360.659907

50%          1.5                      Mean           4.156283
                        Largest       Std. Dev.      4.610535
75%            4             25
90%            8             25       Variance       21.25703
95%           13             25       Skewness       2.603349
99%           25             25       Kurtosis       10.25941
*/

* Physics
summarize q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1 & subject == 3, detail
/*

                      q1_num_globalwarm
-------------------------------------------------------------
      Percentiles      Smallest
 1%          1.5            1.5
 5%          1.5            1.5
10%          1.5            1.5       Obs                  75
25%          1.5            1.5       Sum of Wgt.  119.112575

50%          1.5                      Mean           4.059772
                        Largest       Std. Dev.      5.373499
75%            4             13
90%            8             25       Variance       28.87449
95%           13             25       Skewness       2.803852
99%           25             25       Kurtosis       10.68597

*/

* Chemistry
summarize q1_num_globalwarm [aw = anal_wt] if q1_globalwarm!= 1 & subject == 4, detail
/*

                      q1_num_globalwarm
-------------------------------------------------------------
      Percentiles      Smallest
 1%          1.5            1.5
 5%          1.5            1.5
10%          1.5            1.5       Obs                  96
25%          1.5            1.5       Sum of Wgt.  89.1828022

50%          1.5                      Mean           3.486295
                        Largest       Std. Dev.       3.87955
75%            4             13
90%            8             13       Variance       15.05091
95%           13             13       Skewness       2.974233
99%           25             25       Kurtosis       13.80297
*/


*******************************************************************
*******************************************************************
** Table 2. Proportion of teachers covering each topic, sorted from most to least common  
*******************************************************************
*******************************************************************

** Greenhouse Lesson
tab q3_greenhouse_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 924.783042       85.87       85.87
         no | 152.216958       14.13      100.00
------------+-----------------------------------
      Total |      1,077      100.00
*/

tab q3_greenhouse_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 238.615664       92.85       92.85
         no | 18.3843356        7.15      100.00
------------+-----------------------------------
      Total |        257      100.00

*/

tab q3_greenhouse_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 258.022904       97.37       97.37
         no | 6.97709607        2.63      100.00
------------+-----------------------------------
      Total |        265      100.00

*/

tab q3_greenhouse_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 47.6447301       63.53       63.53
         no | 27.3552699       36.47      100.00
------------+-----------------------------------
      Total |         75      100.00

*/

tab q3_greenhouse_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 78.0446295       82.15       82.15
         no | 16.9553705       17.85      100.00
------------+-----------------------------------
      Total |         95      100.00

*/

tab q3_greenhouse_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]
/*
        les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 325.085166       84.44       84.44
         no | 59.9148337       15.56      100.00
------------+-----------------------------------
      Total |        385      100.00


*/


** Carbon Cycle

tab q3_carboncyc_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |841.3327939       77.69       77.69
         no |241.6672061       22.31      100.00
------------+-----------------------------------
      Total |      1,083      100.00


*/

tab q3_carboncyc_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 258.604578       98.33       98.33
         no | 4.39542181        1.67      100.00
------------+-----------------------------------
      Total |        263      100.00


*/

tab q3_carboncyc_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 227.176923       86.05       86.05
         no | 36.8230774       13.95      100.00
------------+-----------------------------------
      Total |        264      100.00


*/

tab q3_carboncyc_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 33.9929577       44.15       44.15
         no | 43.0070423       55.85      100.00
------------+-----------------------------------
      Total |         77      100.00


*/

tab q3_carboncyc_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 50.7189955       55.74       55.74
         no | 40.2810045       44.26      100.00
------------+-----------------------------------
      Total |         91      100.00

*/

tab q3_carboncyc_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
 part of my |
   lesson p |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 278.248747       71.71       71.71
         no | 109.751253       28.29      100.00
------------+-----------------------------------
      Total |        388      100.00

*/

** Sea Level

tab q3_chsealevel_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 728.577157       69.59       69.59
         no | 318.422843       30.41      100.00
------------+-----------------------------------
      Total |      1,047      100.00


*/

tab q3_chsealevel_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 182.489757       73.29       73.29
         no | 66.5102433       26.71      100.00
------------+-----------------------------------
      Total |        249      100.00


*/

tab q3_chsealevel_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 246.746474       93.82       93.82
         no | 16.2535258        6.18      100.00
------------+-----------------------------------
      Total |        263      100.00



*/

tab q3_chsealevel_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 40.3442373       55.27       55.27
         no | 32.6557627       44.73      100.00
------------+-----------------------------------
      Total |         73      100.00


*/

tab q3_chsealevel_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 41.6498555       47.33       47.33
         no | 46.3501445       52.67      100.00
------------+-----------------------------------
      Total |         88      100.00


*/

tab q3_chsealevel_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
       less |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 260.612718       69.68       69.68
         no | 113.387282       30.32      100.00
------------+-----------------------------------
      Total |        374      100.00


*/


** Changes in Water/Ice Quantiy



tab q3_chwater_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |765.6736404       71.76       71.76
         no |301.3263596       28.24      100.00
------------+-----------------------------------
      Total |      1,067      100.00


*/

tab q3_chwater_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |196.2947764       77.59       77.59
         no | 56.7052236       22.41      100.00
------------+-----------------------------------
      Total |        253      100.00


*/

tab q3_chwater_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |   219.2757       83.06       83.06
         no | 44.7243002       16.94      100.00
------------+-----------------------------------
      Total |        264      100.00


*/

tab q3_chwater_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 31.9923917       42.66       42.66
         no | 43.0076083       57.34      100.00
------------+-----------------------------------
      Total |         75      100.00


*/

tab q3_chwater_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 65.4282031       68.87       68.87
         no | 29.5717969       31.13      100.00
------------+-----------------------------------
      Total |         95      100.00


*/

tab q3_chwater_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
      cover |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 279.626538       73.59       73.59
         no | 100.373462       26.41      100.00
------------+-----------------------------------
      Total |        380      100.00


*/



** Seasonal plant/animal life events

tab q3_plantanimal_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 719.999435       67.61       67.61
         no | 345.000565       32.39      100.00
------------+-----------------------------------
      Total |      1,065      100.00

*/

tab q3_plantanimal_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 214.249938       83.04       83.04
         no | 43.7500615       16.96      100.00
------------+-----------------------------------
      Total |        258      100.00

*/

tab q3_plantanimal_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 166.551283       64.31       64.31
         no | 92.4487168       35.69      100.00
------------+-----------------------------------
      Total |        259      100.00

*/

tab q3_plantanimal_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 24.8547975       34.05       34.05
         no | 48.1452025       65.95      100.00
------------+-----------------------------------
      Total |         73      100.00

*/

tab q3_plantanimal_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 34.7850367       37.40       37.40
         no | 58.2149633       62.60      100.00
------------+-----------------------------------
      Total |         93      100.00
*/

tab q3_plantanimal_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
 plant flow |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 271.283933       71.02       71.02
         no | 110.716067       28.98      100.00
------------+-----------------------------------
      Total |        382      100.00

*/

** Changes in ice and snow cover

tab q3_chicesnow_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |655.5016476       61.96       61.96
         no |402.4983524       38.04      100.00
------------+-----------------------------------
      Total |      1,058      100.00


*/

tab q3_chicesnow_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 158.756462       62.75       62.75
         no | 94.2435385       37.25      100.00
------------+-----------------------------------
      Total |        253      100.00


*/

tab q3_chicesnow_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 228.349151       87.16       87.16
         no | 33.6508487       12.84      100.00
------------+-----------------------------------
      Total |        262      100.00

*/

tab q3_chicesnow_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 37.9943554       50.66       50.66
         no | 37.0056446       49.34      100.00
------------+-----------------------------------
      Total |         75      100.00
*/

tab q3_chicesnow_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 40.0471583       43.53       43.53
         no | 51.9528417       56.47      100.00
------------+-----------------------------------
      Total |         92      100.00


*/

tab q3_chicesnow_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
   part of  |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 237.101726       63.06       63.06
         no | 138.898274       36.94      100.00
------------+-----------------------------------
      Total |        376      100.00


*/


** Changes in precipitation

tab q3_chprecip_lesson if q1_taughtgw == 1 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |645.1054876       61.26       61.26
         no |407.8945124       38.74      100.00
------------+-----------------------------------
      Total |      1,053      100.00

*/

tab q3_chprecip_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 157.715095       63.34       63.34
         no | 91.2849052       36.66      100.00
------------+-----------------------------------
      Total |        249      100.00

*/

tab q3_chprecip_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 213.596925       81.84       81.84
         no | 47.4030751       18.16      100.00
------------+-----------------------------------
      Total |        261      100.00


*/

tab q3_chprecip_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 30.8667981       41.16       41.16
         no | 44.1332019       58.84      100.00
------------+-----------------------------------
      Total |         75      100.00


*/

tab q3_chprecip_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 39.3846987       43.28       43.28
         no | 51.6153013       56.72      100.00
------------+-----------------------------------
      Total |         91      100.00

*/

tab q3_chprecip_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
 as part of |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |  244.85471       64.95       64.95
         no |  132.14529       35.05      100.00
------------+-----------------------------------
      Total |        377      100.00

*/




** Ice Ages

tab q3_iceages_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 490.050187       47.49       47.49
         no | 541.949813       52.51      100.00
------------+-----------------------------------
      Total |      1,032      100.00


*/

tab q3_iceages_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 108.888185       44.44       44.44
         no | 136.111815       55.56      100.00
------------+-----------------------------------
      Total |        245      100.00


*/

tab q3_iceages_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 213.885547       83.55       83.55
         no | 42.1144531       16.45      100.00
------------+-----------------------------------
      Total |        256      100.00


*/

tab q3_iceages_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |  25.364124       33.82       33.82
         no |  49.635876       66.18      100.00
------------+-----------------------------------
      Total |         75      100.00


*/

tab q3_iceages_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |23.28637871       26.46       26.46
         no |64.71362129       73.54      100.00
------------+-----------------------------------
      Total |         88      100.00



*/

tab q3_iceages_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
lesson plan |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |  187.46322       50.94       50.94
         no |  180.53678       49.06      100.00
------------+-----------------------------------
      Total |        368      100.00


*/





** Solar Variability

tab q3_solarvar_lesson if q1_taughtgw == 1 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 436.184154       41.46       41.46
         no | 615.815846       58.54      100.00
------------+-----------------------------------
      Total |      1,052      100.00


*/

tab q3_solarvar_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 86.1995042       34.62       34.62
         no | 162.800496       65.38      100.00
------------+-----------------------------------
      Total |        249      100.00


*/

tab q3_solarvar_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 205.571622       79.07       79.07
         no | 54.4283781       20.93      100.00
------------+-----------------------------------
      Total |        260      100.00


*/

tab q3_solarvar_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 36.6764215       48.26       48.26
         no | 39.3235785       51.74      100.00
------------+-----------------------------------
      Total |         76      100.00


*/

tab q3_solarvar_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |27.10302654       30.45       30.45
         no |61.89697346       69.55      100.00
------------+-----------------------------------
      Total |         89      100.00


*/

tab q3_solarvar_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
     my les |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 148.062453       39.17       39.17
         no | 229.937547       60.83      100.00
------------+-----------------------------------
      Total |        378      100.00


*/




** Ocean acidification

tab q3_oceanacid_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 444.099686       42.02       42.02
         no | 612.900314       57.98      100.00
------------+-----------------------------------
      Total |      1,057      100.00


*/

tab q3_oceanacid_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 126.520278       50.21       50.21
         no | 125.479722       49.79      100.00
------------+-----------------------------------
      Total |        252      100.00


*/

tab q3_oceanacid_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 156.779392       59.39       59.39
         no | 107.220608       40.61      100.00
------------+-----------------------------------
      Total |        264      100.00


*/

tab q3_oceanacid_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 24.2487085       31.91       31.91
         no | 51.7512915       68.09      100.00
------------+-----------------------------------
      Total |         76      100.00


*/

tab q3_oceanacid_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 45.1085686       50.12       50.12
         no | 44.8914314       49.88      100.00
------------+-----------------------------------
      Total |         90      100.00



*/

tab q3_oceanacid_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
       my l |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 118.486799       31.60       31.60
         no | 256.513201       68.40      100.00
------------+-----------------------------------
      Total |        375      100.00



*/

** The medieval warming period

tab q3_medievalwarm_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 148.480596       14.14       14.14
         no | 901.519404       85.86      100.00
------------+-----------------------------------
      Total |      1,050      100.00


*/

tab q3_medievalwarm_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 34.3069432       13.56       13.56
         no | 218.693057       86.44      100.00
------------+-----------------------------------
      Total |        253      100.00


*/

tab q3_medievalwarm_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 75.2352454       29.74       29.74
         no |177.7647546       70.26      100.00
------------+-----------------------------------
      Total |        253      100.00


*/

tab q3_medievalwarm_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |   14.54127       19.13       19.13
         no |   61.45873       80.87      100.00
------------+-----------------------------------
      Total |         76      100.00



*/

tab q3_medievalwarm_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 11.2642777       12.11       12.11
         no | 81.7357223       87.89      100.00
------------+-----------------------------------
      Total |         93      100.00


*/

tab q3_medievalwarm_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
       part |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |37.12654818        9.90        9.90
         no | 337.873452       90.10      100.00
------------+-----------------------------------
      Total |        375      100.00


*/


** Events described in the Bible

tab q3_biblicalevents_lesson if q1_taughtgw == 1 [aweight = anal_wt]
/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 27.7171826        2.65        2.65
         no | 1,017.2828       97.35      100.00
------------+-----------------------------------
      Total |      1,045      100.00


*/

tab q3_biblicalevents_lesson if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 4.62946072        1.82        1.82
         no | 250.370539       98.18      100.00
------------+-----------------------------------
      Total |        255      100.00



*/

tab q3_biblicalevents_lesson if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 13.1025232        5.20        5.20
         no |238.8974768       94.80      100.00
------------+-----------------------------------
      Total |        252      100.00


*/

tab q3_biblicalevents_lesson if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 3.46982911        4.51        4.51
         no | 73.5301709       95.49      100.00
------------+-----------------------------------
      Total |         77      100.00



*/

tab q3_biblicalevents_lesson if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | .985831891        1.07        1.07
         no | 91.0141681       98.93      100.00
------------+-----------------------------------
      Total |         92      100.00


*/

tab q3_biblicalevents_lesson if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
  as judgme |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 9.63179087        2.61        2.61
         no | 359.368209       97.39      100.00
------------+-----------------------------------
      Total |        369      100.00



*/

*******************************************************************
*******************************************************************
** Figure 2. Number of specific topics mentioned by those teachers 
** devot-ing at least one class period to recent global warming
*******************************************************************
*******************************************************************
** Rescaling variable

replace q3_greenhouse_lesson = 0 if q3_greenhouse_lesson == 2
replace q3_iceages_lesson = 0 if q3_iceages_lesson == 2
replace q3_medievalwarm_lesson = 0 if q3_medievalwarm_lesson == 2
replace q3_carboncyc_lesson = 0 if q3_carboncyc_lesson == 2
replace q3_solarvar_lesson = 0 if q3_solarvar_lesson == 2
replace q3_oceanacid_lesson = 0 if q3_oceanacid_lesson  == 2
replace q3_chsealevel_lesson = 0 if q3_chsealevel_lesson == 2
replace q3_plantanimal_lesson = 0 if q3_plantanimal_lesson == 2
replace q3_chwater_lesson = 0 if q3_chwater_lesson == 2
replace q3_chicesnow_lesson = 0 if q3_chicesnow_lesson == 2
replace q3_chprecip_lesson = 0 if q3_chprecip_lesson == 2
replace q3_biblicalevents_lesson = 0 if q3_biblicalevents_lesson == 2

** Creating variable that counts topics mentioned in lessons
gen q3_total_topics = (q3_greenhouse_lesson + q3_iceages_lesson + q3_medievalwarm_lesson ///
+ q3_carboncyc_lesson + q3_solarvar_lesson + q3_oceanacid_lesson + q3_chsealevel_lesson + ///
q3_plantanimal_lesson + q3_chwater_lesson + q3_chicesnow_lesson + q3_chprecip_lesson + /// 
q3_biblicalevents_lesson) if q1_taughtgw == 1


label var q3_total_topics "Number of Topics Covered"

hist q3_total_topics, percent scheme(s2color)

sum q3_total_topics [aweight=anal_wt], detail

/*
                  Number of Topics Covered
-------------------------------------------------------------
      Percentiles      Smallest
 1%            2              1
 5%            3              2
10%            4              2       Obs                 856
25%            6              2       Sum of Wgt.  819.322079

50%            8                      Mean           7.408808
                        Largest       Std. Dev.      2.455212
75%            9             12
90%           10             12       Variance       6.028066
95%           11             12       Skewness      -.4995513
99%           11             12       Kurtosis       2.487446
*/





*******************************************************************
*******************************************************************
** Table 3. Percentage of teachers discussing potential solutions 
** or steps students can take to address challenges of climate change
*******************************************************************
*******************************************************************
** Policy Solutions
tab q5_policysolutions if q1_taughtgw == 1 [aweight = anal_wt]

/*

          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 311.586176       28.59       28.59
         no | 778.413824       71.41      100.00
------------+-----------------------------------
      Total |      1,090      100.00

*/

tab q5_policysolutions if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]
/*
          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |86.15501769       33.39       33.39
         no | 171.844982       66.61      100.00
------------+-----------------------------------
      Total |        258      100.00
*/


tab q5_policysolutions if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]
/*
          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 119.773585       45.37       45.37
         no | 144.226415       54.63      100.00
------------+-----------------------------------
      Total |        264      100.00


*/


tab q5_policysolutions if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]
/*
          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 26.1742679       33.56       33.56
         no | 51.8257321       66.44      100.00
------------+-----------------------------------
      Total |         78      100.00

*/


tab q5_policysolutions if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]
/*
          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 23.1302707       23.60       23.60
         no | 74.8697293       76.40      100.00
------------+-----------------------------------
      Total |         98      100.00

*/


tab q5_policysolutions if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
          a |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |77.88762409       19.87       19.87
         no | 314.112376       80.13      100.00
------------+-----------------------------------
      Total |        392      100.00

*/


** Alternative Energy
tab q5_technology  if q1_taughtgw == 1 [aweight = anal_wt]


/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 963.089092       88.28       88.28
         no | 127.910908       11.72      100.00
------------+-----------------------------------
      Total |      1,091      100.00


*/

tab q5_technology  if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |  226.24874       87.35       87.35
         no | 32.7512603       12.65      100.00
------------+-----------------------------------
      Total |        259      100.00

*/


tab q5_technology  if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 241.280095       91.05       91.05
         no | 23.7199051        8.95      100.00
------------+-----------------------------------
      Total |        265      100.00

*/


tab q5_technology  if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 69.6066296       89.24       89.24
         no | 8.39337041       10.76      100.00
------------+-----------------------------------
      Total |         78      100.00

*/


tab q5_technology  if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 85.7274843       87.48       87.48
         no | 12.2725157       12.52      100.00
------------+-----------------------------------
      Total |         98      100.00

*/


tab q5_technology  if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]

/*
    such as |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 345.499074       88.36       88.36
         no | 45.5009261       11.64      100.00
------------+-----------------------------------
      Total |        391      100.00

*/

** Geoengineering

tab q5_geoengineering  if q1_taughtgw == 1 [aweight = anal_wt]


/*
     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 511.896604       46.96       46.96
         no | 578.103396       53.04      100.00
------------+-----------------------------------
      Total |      1,090      100.00


 
*/

tab q5_geoengineering  if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
    climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 115.683519       45.01       45.01
         no | 141.316481       54.99      100.00
------------+-----------------------------------
      Total |        257      100.00


*/


tab q5_geoengineering   if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*

     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 155.820579       58.58       58.58
         no | 110.179421       41.42      100.00
------------+-----------------------------------
      Total |        266      100.00

     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 36.9993994       47.44       47.44
         no | 41.0006006       52.56      100.00
------------+-----------------------------------
      Total |         78      100.00

*/


tab q5_geoengineering   if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*

     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 36.9993994       47.44       47.44
         no | 41.0006006       52.56      100.00
------------+-----------------------------------
      Total |         78      100.00

*/


tab q5_geoengineering   if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 48.1061175       49.09       49.09
         no | 49.8938825       50.91      100.00
------------+-----------------------------------
      Total |         98      100.00

*/


tab q5_geoengineering  if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]


/*
     climat |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 177.463013       45.39       45.39
         no | 213.536987       54.61      100.00
------------+-----------------------------------
      Total |        391      100.00

*/

** Student Solutions
tab q5_studentsolutions   if q1_taughtgw == 1 [aweight = anal_wt]


/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 959.220909       88.00       88.00
         no | 130.779091       12.00      100.00
------------+-----------------------------------
      Total |      1,090      100.00

*/

tab q5_studentsolutions   if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 229.821868       88.73       88.73
         no | 29.1781317       11.27      100.00
------------+-----------------------------------
      Total |        259      100.00

*/


tab q5_studentsolutions  if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 249.975303       94.69       94.69
         no | 14.0246971        5.31      100.00
------------+-----------------------------------
      Total |        264      100.00

*/


tab q5_studentsolutions   if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes |  60.607444       77.70       77.70
         no |  17.392556       22.30      100.00
------------+-----------------------------------
      Total |         78      100.00

*/


tab q5_studentsolutions   if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 78.3438972       79.94       79.94
         no | 19.6561028       20.06      100.00
------------+-----------------------------------
      Total |         98      100.00


*/


tab q5_studentsolutions  if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]


/*
     school |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 355.713595       90.98       90.98
         no | 35.2864052        9.02      100.00
------------+-----------------------------------
      Total |        391      100.00

*/

** Career Opportunities

tab q5_career if q1_taughtgw == 1 [aweight = anal_wt]

/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 733.620796       67.30       67.30
         no | 356.379204       32.70      100.00
------------+-----------------------------------
      Total |      1,090      100.00

*/

tab q5_career  if q1_taughtgw == 1 & subject == 1 [aweight = anal_wt]

/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 161.159602       62.22       62.22
         no | 97.8403976       37.78      100.00
------------+-----------------------------------
      Total |        259      100.00

*/


tab q5_career  if q1_taughtgw == 1 & subject == 2 [aweight = anal_wt]

/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 205.937834       78.30       78.30
         no | 57.0621662       21.70      100.00
------------+-----------------------------------
      Total |        263      100.00

*/


tab q5_career if q1_taughtgw == 1 & subject == 3 [aweight = anal_wt]

/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 57.3031531       73.47       73.47
         no | 20.6968469       26.53      100.00
------------+-----------------------------------
      Total |         78      100.00


*/


tab q5_career if q1_taughtgw == 1 & subject == 4 [aweight = anal_wt]

/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 67.5085926       68.89       68.89
         no | 30.4914074       31.11      100.00
------------+-----------------------------------
      Total |         98      100.00

*/


tab q5_career if q1_taughtgw == 1 & subject == 5 [aweight = anal_wt]


/*
     n, new |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 263.124326       67.12       67.12
         no | 128.875674       32.88      100.00
------------+-----------------------------------
      Total |        392      100.00

*/
 
 
 

*******************************************************************
*******************************************************************
** Finding 4: Many students are receiving mixed messages 
*******************************************************************
*******************************************************************

tab q4_globaltemp [aweight=anal_wt]

/*

  when i do teach |
    about climate |
       change...i |
   emphasize that |
   average global |
        temperatu |      Freq.     Percent        Cum.
------------------+-----------------------------------
   strongly agree | 383.423561       25.84       25.84
            agree | 562.210072       37.88       63.72
         disagree | 100.419273        6.77       70.49
strongly disagree | 22.8829643        1.54       72.03
   not applicable |415.0641301       27.97      100.00
------------------+-----------------------------------
            Total |      1,484      100.00

*/


tab q4_sciconsensus [aweight=anal_wt]
** MOVED 2.5 TO NA

/*
  when i do teach |
    about climate |
       change...i |
    emphasize the |
       scientific |
   consensus that |      Freq.     Percent        Cum.
------------------+-----------------------------------
   strongly agree | 436.200099       29.31       29.31
            agree | 544.850923       36.62       65.93
              2.5 |.8956602689        0.06       65.99
         disagree |129.8515766        8.73       74.72
strongly disagree | 44.8534395        3.01       77.73
   not applicable | 331.348301       22.27      100.00
------------------+-----------------------------------
            Total |      1,488      100.00
*/

tab q4_naturalcauses [aweight=anal_wt]
** MOVED 2.5 TO NA
/*

  when i do teach |
    about climate |
       change...i |
   emphasize that |
  many scientists |
         believe  |      Freq.     Percent        Cum.
------------------+-----------------------------------
   strongly agree | 67.4036207        4.54        4.54
            agree | 392.892696       26.48       31.02
              2.5 | 2.44268162        0.16       31.18
         disagree | 448.163695       30.20       61.38
strongly disagree |202.6281469       13.65       75.04
   not applicable |  370.46916       24.96      100.00
------------------+-----------------------------------
            Total |      1,484      100.00
*/

/*
This suggests that many students are seeing political conflicts over the sources 
of climate change replayed in their classrooms, with their science teacher at 
times communicating the scientific 
*/
** We remove 'not applicable' answers from the analysis
tab q4_naturalcauses q4_sciconsensus if q4_naturalcauses != 5 & q4_sciconsensus != 5  [aw=anal_wt], cell



/*

 when i do teach |
    about climate |
       change...i |
   emphasize that | when i do teach about climate change...i emphasize the
  many scientists |               scientific consensus that
         believe  | strongly       agree        2.5   disagree  strongly  |     Total
------------------+-------------------------------------------------------+----------
   strongly agree | 33.899617   3.008877          0  14.582883  14.498685 | 65.990063 
                  |      2.98       0.26       0.00       1.28       1.27 |      5.80 
------------------+-------------------------------------------------------+----------
            agree | 62.310744 255.452875          0  63.994354   18.72988 | 400.48785 
                  |      5.48      22.45       0.00       5.62       1.65 |     35.19 
------------------+-------------------------------------------------------+----------
              2.5 |         0          0  .92831739  1.6010673          0 | 2.5293846 
                  |      0.00       0.00       0.08       0.14       0.00 |      0.22 
------------------+-------------------------------------------------------+----------
         disagree | 170.27306  236.97516          0  47.321362   6.307596 | 460.87718 
                  |     14.96      20.82       0.00       4.16       0.55 |     40.50 
------------------+-------------------------------------------------------+----------
strongly disagree | 165.64529  40.040131          0          0  2.4300963 | 208.11552 
                  |     14.56       3.52       0.00       0.00       0.21 |     18.29 
------------------+-------------------------------------------------------+----------
            Total | 432.12872  535.47704  .92831739  127.49967  41.966257 |     1,138 
                  |     37.97      47.05       0.08      11.20       3.69 |    100.00 
*/



*******************************************************************
*******************************************************************
** Table 5a. Teacher approaches to debate and inquiry in global warming education
*******************************************************************
*******************************************************************

tab q4_debate [aweight=anal_wt]

/*

  when i do teach |
    about climate |
       change...i |
        encourage |
      students to |
debate the likely |      Freq.     Percent        Cum.
------------------+-----------------------------------
   strongly agree | 283.639816       19.13       19.13
            agree | 576.559524       38.88       58.00
         disagree | 150.694612       10.16       68.17
strongly disagree |43.36534142        2.92       71.09
   not applicable | 428.740706       28.91      100.00
------------------+-----------------------------------
            Total |      1,483      100.00
*/

tab q4_ownconclusions [aweight=anal_wt]

/*

  when i do teach |
    about climate |
       change...i |
        encourage |
 students to come |
     to their own |      Freq.     Percent        Cum.
------------------+-----------------------------------
   strongly agree | 317.846527       21.45       21.45
              1.5 | .802463486        0.05       21.50
            agree | 571.268093       38.55       60.05
         disagree | 180.724557       12.19       72.24
strongly disagree | 39.0491825        2.63       74.88
   not applicable | 372.309177       25.12      100.00
------------------+-----------------------------------
            Total |      1,482      100.00
*/



*******************************************************************
*******************************************************************
** Table 5b. Teacher reports on their use of strategies used to 
** address the controversial nature of climate change
*******************************************************************
*******************************************************************

tab q7_naturescience [aweight = anal_wt], missing
/*
     tell us about your approach to the |
   following�discuss the controversy in |
                               the cont |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 828.735455       55.25       55.25
i have not done this, but might if the  | 532.634321       35.51       90.76
                    i would not do this | 83.7690059        5.58       96.34
                                      . |54.86121802        3.66      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00




*/

tab q7_discussion [aweight = anal_wt], missing
/*
     tell us about your approach to the |
following�allow students to discuss the |
                                  contr |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 707.628914       47.18       47.18
i have not done this, but might if the  |  576.55717       38.44       85.61
                    i would not do this |  170.14309       11.34       96.96
                                      . |  45.670826        3.04      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_meetstudents [aweight = anal_wt], missing
/*
     tell us about your approach to the |
  following�offer to meet with students |
                                after c |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this |487.4951517       32.50       32.50
i have not done this, but might if the  | 641.899242       42.79       75.29
                    i would not do this |   317.3341       21.16       96.45
                                      . |  53.271507        3.55      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_equaltime [aweight = anal_wt], missing
/*
     tell us about your approach to the |
           following�give equal time to |
                       perspectives tha |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 407.795798       27.19       27.19
i have not done this, but might if the  | 715.885247       47.73       74.91
                    i would not do this | 323.099468       21.54       96.45
                                      . | 53.2194867        3.55      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_standards [aweight = anal_wt], missing
/*
     tell us about your approach to the |
 following�adhere strictly to standards |
                                 and no |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 116.378444        7.76        7.76
i have not done this, but might if the  | 272.168342       18.14       25.90
                    i would not do this | 1,054.0508       70.27       96.17
                                      . |57.40239557        3.83      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_nodebate [aweight = anal_wt], missing
/*
     tell us about your approach to the |
  following�discourage debate because i |
                                believe |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 115.580995        7.71        7.71
i have not done this, but might if the  | 204.527495       13.64       21.34
                    i would not do this | 1,124.0036       74.93       96.27
                                      . |  55.887945        3.73      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/


tab q7_optout [aweight = anal_wt], missing
/*
     tell us about your approach to the |
 following�allow students to opt out of |
                                 portio |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 85.3990625        5.69        5.69
i have not done this, but might if the  | 402.776822       26.85       32.55
                    i would not do this | 960.148455       64.01       96.55
                                      . | 51.6756603        3.45      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_parentletter [aweight = anal_wt], missing
/*
     tell us about your approach to the |
following�send an explanatory letter to |
                                  paren |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 39.6163211        2.64        2.64
i have not done this, but might if the  | 608.500798       40.57       43.21
                    i would not do this | 798.183585       53.21       96.42
                                      . | 53.6992961        3.58      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/

tab q7_avoiddiscussion [aweight = anal_wt], missing

/*

     tell us about your approach to the |
      following�avoid all discussion of |
                            climate cha |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                       i have done this | 33.7864749        2.25        2.25
i have not done this, but might if the  | 88.4909143        5.90        8.15
                    i would not do this | 1,325.5875       88.37       96.52
                                      . | 52.1351185        3.48      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,500      100.00

*/


*******************************************************************
*******************************************************************
** Table 6. Teacher self-ratings of their content knowledge
*******************************************************************
*******************************************************************

tab q23_ecology [aweight=anal_wt]
/*

      how would you rate your knowledge |
                           on...ecology |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  |142.4861101        9.81        9.81
   typical of most high school teachers |657.4684962       45.28       55.09
very good compared to most high school  |  526.29647       36.25       91.34
exceptional: on par with many college-l | 125.748924        8.66      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,452      100.00

*/

tab q23_climate [aweight=anal_wt]
/*
      how would you rate your knowledge |
             on...climate change models |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  | 239.817019       16.54       16.54
   typical of most high school teachers | 806.449896       55.62       72.16
very good compared to most high school  | 362.791172       25.02       97.18
exceptional: on par with many college-l | 40.9419127        2.82      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,450      100.00


*/


tab q23_genetics [aweight=anal_wt]
/*
      how would you rate your knowledge |
                   on...modern genetics |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  | 235.426631       16.30       16.30
   typical of most high school teachers | 568.203651       39.35       55.65
very good compared to most high school  |  519.35519       35.97       91.62
exceptional: on par with many college-l | 121.014527        8.38      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,444      100.00


*/

tab q23_weather [aweight=anal_wt]

/*
      how would you rate your knowledge |
        on...weather forecasting models |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  | 453.241286       31.30       31.30
   typical of most high school teachers | 641.072695       44.27       75.57
very good compared to most high school  |  307.21695       21.22       96.79
exceptional: on par with many college-l | 46.4690693        3.21      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,448      100.00

*/
 
tab q23_health [aweight=anal_wt]
/*
      how would you rate your knowledge |
              on...health and nutrition |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  |130.5055931        9.01        9.01
   typical of most high school teachers | 630.531966       43.51       52.52
very good compared to most high school  |  535.07304       36.93       89.45
exceptional: on par with many college-l | 152.889401       10.55      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,449      100.00

*/

tab q23_evolution [aweight=anal_wt]

/*

      how would you rate your knowledge |
               on...evolutionary theory |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
i know less about this topic than many  | 150.769824       10.41       10.41
   typical of most high school teachers | 660.084557       45.59       56.00
very good compared to most high school  | 505.766452       34.93       90.93
exceptional: on par with many college-l | 131.379167        9.07      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,448      100.00

*/



*******************************************************************
*******************************************************************
** Table 7. Priority given to potential topics in a teaching unit on the greenhouse effect.
*******************************************************************
*******************************************************************

tab q8_co2 [aweight=anal_wt]
/*
 what priority would you give to�carbon |
dioxide trapping heat in the atmosphere |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 1,078.9008       74.10       74.10
                      a medium priority | 317.625475       21.81       95.92
it is not necessary to cover this topic | 13.2080958        0.91       96.82
       this topic should not be covered | 3.29010624        0.23       97.05
               i do not have an opinion | 42.9755504        2.95      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,456      100.00

.

*/

tab q8_coaloil [aweight=anal_wt]

/*

 what priority would you give to�use of |
   coal and oil by utility and electric |
                                   comp |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 860.813986       59.12       59.12
                                    1.5 | 1.55524556        0.11       59.23
                      a medium priority | 508.770217       34.94       94.17
it is not necessary to cover this topic | 30.3466877        2.08       96.26
       this topic should not be covered | 6.06149856        0.42       96.67
               i do not have an opinion | 48.4523651        3.33      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,456      100.00


*/

tab q8_emissions [aweight=anal_wt]

/*
           what priority would you give |
             to�emissions from industry |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 819.827887       56.38       56.38
                      a medium priority | 554.453884       38.13       94.52
it is not necessary to cover this topic | 26.7635851        1.84       96.36
       this topic should not be covered |  2.0981314        0.14       96.50
               i do not have an opinion |50.85651272        3.50      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,454      100.00


*/


tab q8_forests [aweight=anal_wt]

/*
           what priority would you give |
              to�destruction of forests |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 795.181715       55.11       55.11
                                    1.5 | .946490531        0.07       55.17
                      a medium priority | 559.988541       38.81       93.98
it is not necessary to cover this topic | 30.1698293        2.09       96.07
       this topic should not be covered | 7.21987563        0.50       96.57
               i do not have an opinion | 49.4935485        3.43      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,443      100.00


*/


tab q8_ozone [aweight=anal_wt]

/*
           what priority would you give |
     to�depletion of ozone in the upper |
                             atmosphere |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 607.412953       41.95       41.95
                      a medium priority | 588.099978       40.61       82.56
                                    2.5 | 1.22938056        0.08       82.65
it is not necessary to cover this topic | 156.608395       10.82       93.46
       this topic should not be covered |44.93892536        3.10       96.57
               i do not have an opinion | 49.7103683        3.43      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,448      100.00


*/


tab q8_waveenergy  [aweight=anal_wt]

/*
           what priority would you give |
     to�incoming shortwave and outgoing |
                        longwave energy |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 353.686256       24.43       24.43
                                    1.5 | 1.37620645        0.10       24.52
                      a medium priority | 569.293582       39.32       63.84
it is not necessary to cover this topic | 220.709656       15.24       79.08
       this topic should not be covered |  19.281594        1.33       80.41
               i do not have an opinion | 283.652706       19.59      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,448      100.00



*/


tab q8_pesticides [aweight=anal_wt]

/*

 what priority would you give to�use of |
      chemicals to destroy insect pests |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 331.447935       22.89       22.89
                      a medium priority |   602.9217       41.64       64.53
                                    2.5 | 1.22807887        0.08       64.61
it is not necessary to cover this topic | 333.940849       23.06       87.68
                                    3.5 | 1.24999037        0.09       87.76
       this topic should not be covered | 66.6443423        4.60       92.36
               i do not have an opinion | 110.567104        7.64      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,448      100.00


*/


tab q8_homes [aweight=anal_wt]

/*
 what priority would you give to�people |
        heating and cooling their homes |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 309.083713       21.42       21.42
                      a medium priority |  892.55273       61.85       83.27
it is not necessary to cover this topic |  143.89444        9.97       93.25
       this topic should not be covered | 13.2162235        0.92       94.16
               i do not have an opinion | 84.2528939        5.84      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,443      100.00


*/


tab q8_aerosol [aweight=anal_wt]

/*
 what priority would you give to�use of |
                     aerosol spray cans |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority | 206.516412       14.29       14.29
                      a medium priority | 787.841866       54.52       68.81
                                    2.5 | 1.23188893        0.09       68.90
it is not necessary to cover this topic | 289.277846       20.02       88.92
                                    3.5 | 1.68988284        0.12       89.04
       this topic should not be covered | 51.6078764        3.57       92.61
               i do not have an opinion | 106.834228        7.39      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,445      100.00


*/

tab q8_rockets [aweight=anal_wt]

/*
    what priority would you give to�the |
 impact of launching rockets into space |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
                        a high priority |  58.139509        4.02        4.02
                                    1.5 |1.805953491        0.12        4.14
                      a medium priority | 383.728427       26.52       30.66
                                    2.5 | 1.21529115        0.08       30.75
it is not necessary to cover this topic | 591.580526       40.88       71.63
       this topic should not be covered | 99.3874398        6.87       78.50
               i do not have an opinion | 311.142854       21.50      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,447      100.00


*/



*******************************************************************
*******************************************************************
** Table 8. Teachers' estimates of the percentage of scientists who 
** attribute global warming to human activities.
*******************************************************************
*******************************************************************

** All Teachers

tab q18_humanpct [aweight = anal_wt] 

/*

 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | 25.6951547        1.75        1.75
   21% - 40% | 92.5778489        6.30        8.05
   41% - 60% | 177.007367       12.05       20.10
   61% - 80% | 288.073431       19.61       39.71
  81% - 100% |  576.86028       39.27       78.98
i don't know | 308.785918       21.02      100.00
-------------+-----------------------------------
       Total |      1,469      100.00


*/


** Biology
tab q18_humanpct if subject == 1 [aweight = anal_wt] 

/*
 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | 6.03829175        1.99        1.99
   21% - 40% | 12.9841221        4.27        6.26
   41% - 60% | 40.1636648       13.21       19.47
   61% - 80% | 49.8626723       16.40       35.87
  81% - 100% | 133.675754       43.97       79.84
i don't know | 61.2754948       20.16      100.00
-------------+-----------------------------------
       Total |        304      100.00

*/

** Earth Science
tab q18_humanpct if subject == 2 [aweight = anal_wt] 
/*

 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | 6.08402886        2.18        2.18
   21% - 40% | 17.1691471        6.15        8.33
   41% - 60% | 33.4701089       12.00       20.33
   61% - 80% | 60.2228051       21.59       41.92
  81% - 100% | 124.136081       44.49       86.41
i don't know | 37.9178287       13.59      100.00
-------------+-----------------------------------
       Total |        279      100.00

*/

** Physics
tab q18_humanpct if subject == 3 [aweight = anal_wt] 
/*
 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | .866910276        0.57        0.57
   21% - 40% | 10.9721698        7.17        7.74
   41% - 60% |  13.531604        8.84       16.58
   61% - 80% | 28.4254814       18.58       35.16
  81% - 100% |  70.171719       45.86       81.02
i don't know | 29.0321156       18.98      100.00
-------------+-----------------------------------
       Total |        153      100.00

*/

** Chemistry
tab q18_humanpct if subject == 4 [aweight = anal_wt] 
/*
 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | 3.60698383        2.02        2.02
   21% - 40% | 12.9390197        7.23        9.24
   41% - 60% | 22.1927128       12.40       21.64
   61% - 80% | 29.2239043       16.33       37.97
  81% - 100% |  79.761845       44.56       82.53
i don't know | 31.2755343       17.47      100.00
-------------+-----------------------------------
       Total |        179      100.00

*/


** Middle School 
tab q18_humanpct if subject == 5 [aweight = anal_wt] 
/*

 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |
 think that  |      Freq.     Percent        Cum.
-------------+-----------------------------------
     0 - 20% | 10.7616295        1.94        1.94
   21% - 40% | 39.8902045        7.20        9.14
   41% - 60% | 69.2550959       12.50       21.64
   61% - 80% | 128.185398       23.14       44.78
  81% - 100% | 167.891272       30.31       75.09
i don't know |138.0164008       24.91      100.00
-------------+-----------------------------------
       Total |        554      100.00

*/


*******************************************************************
*******************************************************************
** Table 9. Teachers' formal coursework and continuing education 
** in climate change.
*******************************************************************
*******************************************************************
** Created in original dataset
* egen nmis=rmiss2(q21*)

** The following assigns a score of zero courses to all questions if the respondent answered
***  at least a single question in the q21 grid
replace q21_sectionclimate_college = 0 if q21_sectionclimate_college == . & nmis < 18
replace q21_courseclimate_college = 0 if q21_courseclimate_college == . & nmis < 18
replace q21_sectionclimate_conted = 0 if q21_sectionclimate_conted == . & nmis < 18
replace q21_courseclimate_conted = 0 if q21_courseclimate_conted == . & nmis < 18
replace q21_courseclimate_opp = 2 if q21_courseclimate_opp == . & nmis < 18


*** Then create initial educational exposure measure in two steps:
** First:
** Created in original file
* gen ed_summary = .
replace ed_summary= (10*q21_courseclimate_college) +q21_sectionclimate_college
tab ed_summary [aw=anal_wt]


/*
 ed_summary |      Freq.     Percent        Cum.
------------+-----------------------------------
          0 | 819.444156       57.14       57.14 None at all (57.14%)
          1 | 247.406014       17.25       74.40 Only one class covered the topic (17.25%)
          2 |133.2741657        9.29       83.69 Two or more courses covered topic (9.29+2.41+2.90 = 14.6
          3 |34.52587018        2.41       86.10
          4 | 41.5611492        2.90       89.00
         10 | 5.25002863        0.37       89.36 One course entirely focused on cc (96.67 - 89.0 = 6.67)
         11 | 37.3444999        2.60       91.97
         12 | 31.7003946        2.21       94.18
         13 | 11.3187707        0.79       94.97
         14 | 17.9383818        1.25       96.22
         20 | 5.11221371        0.36       96.57  Two or more courses (100 - 96.22 = 3.8)
         21 |1.369845542        0.10       96.67
         22 | 18.4702964        1.29       97.96
         23 | 1.87170486        0.13       98.09
         24 | 10.9505471        0.76       98.85
         30 | 1.10052325        0.08       98.93
         33 |  2.6866272        0.19       99.12
         34 | .304888091        0.02       99.14
         40 | 1.17500056        0.08       99.22
         42 | .873129192        0.06       99.28
         44 |10.32179345        0.72      100.00
------------+-----------------------------------
      Total |      1,434      100.00

*/

**** Second: Class exposure variables need to be collapsed

** Created in original dataset
/*gen college_summary=.
replace college_summary = 0 if ed_summary==0
replace college_summary = 1 if ed_summary==1
replace college_summary = 2 if ed_summary>=2 & ed_summary<10
replace college_summary = 3 if ed_summary>=10 & ed_summary<20
replace college_summary = 4 if ed_summary>=20
replace college_summary = . if ed_summary == .

label define course 1 "One exposure"
label define course 2 "Two or more exposures", add
label define course 3 "One entire class", add
label define course 4 "2+ classes", add
label define course 0 "None", add
label values college_summary course
*/
tab college_summary [aw=anal_wt]

/*      college_summary |      Freq.     Percent        Cum.
----------------------+-----------------------------------
                 None | 819.444156       57.14       57.14
         One exposure | 247.406014       17.25       74.40
Two or more exposures | 209.361185       14.60       89.00
     One entire class |103.5520756        7.22       96.22
           2+ classes | 54.2365693        3.78      100.00
----------------------+-----------------------------------
                Total |      1,434      100.00

*/


** Continuing Ed
** Created in original dataset
* gen conted_summary = .
replace conted_summary= (10*q21_courseclimate_conted) +q21_sectionclimate_conted
tab conted_summary [aw=anal_wt]
label values conted_summary course
/*
conted_summ |
        ary |      Freq.     Percent        Cum.
------------+-----------------------------------
          0 | 1,019.5654       71.10       71.10 None at all (71.1%)
          1 | 127.729159        8.91       80.01 Only one class covered the topic (8.91%)
          2 | 44.6576649        3.11       83.12 wo or more courses covered topic (3.11+0.25+0.56 = 3.92)
          3 | 3.65382235        0.25       83.38
          4 | 8.05669859        0.56       83.94
         10 | 13.4572393        0.94       84.88 One course entirely focused on cc (93.17 - 83.94 = 9.23)
         11 | 68.0661875        4.75       89.62
         12 | 29.4082478        2.05       91.67
         13 | 6.59035275        0.46       92.13
         14 | 9.10613297        0.64       92.77
         20 | 5.74897361        0.40       93.17 Two or more courses (100 - 92.77 = 7.23 )
         21 | 7.81281837        0.54       93.71
         22 | 27.4395566        1.91       95.63
         23 | 7.42349563        0.52       96.14
         24 | 11.1822311        0.78       96.92
         31 | 1.53679911        0.11       97.03
         32 | 1.23127125        0.09       97.12
         33 |8.621571625        0.60       97.72
         34 | 3.15526473        0.22       97.94
         40 |2.833975276        0.20       98.14
         41 | 1.60729575        0.11       98.25
         42 | .284093883        0.02       98.27
         43 | 1.24975013        0.09       98.36
         44 | 23.5820249        1.64      100.00
------------+-----------------------------------
      Total |      1,434      100.00

*/



*******************************************************************
*******************************************************************
** Table 10. Teachers' expressed interest in a "professional development 
** course entirely focused on climate change"
*******************************************************************
*******************************************************************

tab q21_courseclimate_opp [aweight = anal_wt]

tab q21_courseclimate_opp if college_summary == 0 & conted_summary == 0 [aweight = anal_wt]
/*
    courses |
   entirely |
 focused on |
    climate |
  change: i |
 would take |
  advantage |
 of such an |
         op |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 294.546562       47.05       47.05
         no | 331.453438       52.95      100.00
------------+-----------------------------------
      Total |        626      100.00

*/


tab q21_courseclimate_opp if college_summary == 0 & conted_summary >= 1 [aweight = anal_wt]
/*
    courses |
   entirely |
 focused on |
    climate |
  change: i |
 would take |
  advantage |
 of such an |
         op |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 109.380692       72.44       72.44
         no |  41.619308       27.56      100.00
------------+-----------------------------------
      Total |        151      100.00


*/


tab q21_courseclimate_opp if college_summary >= 1 & conted_summary == 0 [aweight = anal_wt]
/*
    courses |
   entirely |
 focused on |
    climate |
  change: i |
 would take |
  advantage |
 of such an |
         op |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 206.516682       58.01       58.01
         no | 149.483318       41.99      100.00
------------+-----------------------------------
      Total |        356      100.00

*/


tab q21_courseclimate_opp if college_summary >= 1 & conted_summary >= 1 [aweight = anal_wt]
/*
    courses |
   entirely |
 focused on |
    climate |
  change: i |
 would take |
  advantage |
 of such an |
         op |      Freq.     Percent        Cum.
------------+-----------------------------------
        yes | 222.130055       73.80       73.80
         no | 78.8699453       26.20      100.00
------------+-----------------------------------
      Total |        301      100.00


*/


tab q21_courseclimate_opp if college_summary == 0 & conted_summary == 0 [aweight = anal_wt]
/*

*/

*******************************************************************
*******************************************************************
** Table 11. Teachers' expressed interest in a "professional development 
** course entirely focused on climate change"
*******************************************************************
*******************************************************************

tab q16_gwcauses [aweight = anal_wt]

/*

which of the following comes closest to |
                             your view? |      Freq.     Percent        Cum.
----------------------------------------+-----------------------------------
global warming is caused mostly by huma | 970.245127       67.71       67.71
                                    1.5 | 164.601194       11.49       79.19
global warming is caused mostly by natu | 228.985965       15.98       95.17
        global warming is not happening |32.13663263        2.24       97.42
                        other (specify) | .294181497        0.02       97.44
                                      5 | 36.7369005        2.56      100.00
----------------------------------------+-----------------------------------
                                  Total |      1,433      100.00
*/



*******************************************************************
*******************************************************************
** Table 12. Teacher reports of pressure to teach or not teach global warming 
*******************************************************************
*******************************************************************

tab q9_teachgw_schooladmin [aweight = anal_wt]

/*
   from: sch |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 |  1,468.463       99.35       99.35
    selected | 9.53703175        0.65      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_teachgw_local [aweight = anal_wt]

/*
   from: loc |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,473.9543       99.73       99.73
    selected | 4.04573899        0.27      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_teachgw_parents [aweight = anal_wt]

/*
   from: par |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,469.8059       99.45       99.45
    selected | 8.19411779        0.55      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/


tab q9_teachgw_schoolboard [aweight = anal_wt]

/*
   from: sch |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,472.5576       99.63       99.63
    selected | 5.44244623        0.37      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_teachgw_teachers [aweight = anal_wt]

/*
   from: fel |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,431.8066       96.87       96.87
    selected | 46.1934394        3.13      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/


tab q9_teachgw_other [aweight = anal_wt]

/*
   from: oth |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,440.4667       97.46       97.46
    selected | 37.5332653        2.54      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_teachgw_none [aweight = anal_wt]

/*
   from: no  |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 87.6187271        5.93        5.93
    selected | 1,390.3813       94.07      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/

** Pressure to NOT Teach
tab q9_noteachgw_schooladmin [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,468.8941       99.38       99.38
    selected | 9.10591698        0.62      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_noteachgw_local [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 |  1,456.615       98.55       98.55
    selected | 21.3850171        1.45      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/

tab q9_noteachgw_parents [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,450.6532       98.15       98.15
    selected | 27.3468249        1.85      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/


tab q9_noteachgw_schoolboard [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,472.7194       99.64       99.64
    selected | 5.28062267        0.36      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/

tab q9_noteachgw_teachers [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,456.3398       98.53       98.53
    selected | 21.6602137        1.47      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/


tab q9_noteachgw_other [aweight = anal_wt]

/*
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 1,463.4485       99.02       99.02
    selected | 14.5514994        0.98      100.00
-------------+-----------------------------------
       Total |      1,478      100.00

*/

tab q9_noteachgw_none [aweight = anal_wt]

/*
     warming |
       from: |      Freq.     Percent        Cum.
-------------+-----------------------------------
           0 | 66.8684073        4.52        4.52
    selected | 1,411.1316       95.48      100.00
-------------+-----------------------------------
       Total |      1,478      100.00


*/


*******************************************************************
*******************************************************************
** Figure 13. Percentage of teachers aware of scientific consensus, 
** by political ideology con-cerning the role of the government
*******************************************************************
*******************************************************************



************** Consensus awareness binary variable  ************
gen consens80 = .
replace consens80 = 1 if q18_humanpct==5
replace consens80 = 0 if q18_humanpct< 5
replace consens80 = 0 if q18_humanpct==6
tab q18_humanpct consens80, missing

/*
 to the best |
     of your |
  knowledge, |
        what |
  proportion |
  of climate |
  scientists |            consens80
 think that  |         0          1          . |     Total
-------------+---------------------------------+----------
     0 - 20% |        27          0          0 |        27 
   21% - 40% |        90          0          0 |        90 
   41% - 60% |       177          0          0 |       177 
   61% - 80% |       299          0          0 |       299 
  81% - 100% |         0        583          0 |       583 
i don't know |       293          0          0 |       293 
           . |         0          0         31 |        31 
-------------+---------------------------------+----------
       Total |       886        583         31 |     1,500 

*/

tab q19_govrole consens80 [aweight = anal_wt], row

/*
+----------------+

where would you place |
      yourself on the |
    following 7 point |       consens80
               scale? |         0          1 |     Total
----------------------+----------------------+----------
1 it's not the govern | 45.425951  11.224218 | 56.650169 
                      |     80.19      19.81 |    100.00 
----------------------+----------------------+----------
                    2 | 48.712515  16.609264 | 65.321779 
                      |     74.57      25.43 |    100.00 
----------------------+----------------------+----------
                    3 | 79.679852  19.442108 |  99.12196 
                      |     80.39      19.61 |    100.00 
----------------------+----------------------+----------
                    4 | 211.59417  44.138387 | 255.73256 
                      |     82.74      17.26 |    100.00 
----------------------+----------------------+----------
                    5 | 229.49568  127.86234 | 357.35803 
                      |     64.22      35.78 |    100.00 
----------------------+----------------------+----------
                    6 | 196.28814  186.96082 | 383.24897 
                      |     51.22      48.78 |    100.00 
----------------------+----------------------+----------
7 sometimes governmen | 76.793798  167.77274 | 244.56654 
                      |     31.40      68.60 |    100.00 
----------------------+----------------------+----------
                Total | 887.99012  574.00988 |     1,462 
                      |     60.74      39.26 |    100.00 

*/



*******************************************************************
*******************************************************************
** Finding 14: Perception of the scientific consensus is strongly, but inconsistently 
** correlated with teachers� personal opinions concerning the causes of recent global warming.
*******************************************************************
*******************************************************************

tab q16_gwcauses consens80 [aweight = anal_wt], row
 
/*
         which of the |
      following comes |       consens80
closest to your view? |         0          1 |     Total
----------------------+----------------------+----------
global warming is cau | 464.63897  504.69567 | 969.33464 
                      |     47.93      52.07 |    100.00 
----------------------+----------------------+----------
                  1.5 | 139.88515  24.615978 | 164.50113 
                      |     85.04      14.96 |    100.00 
----------------------+----------------------+----------
global warming is cau |210.583447  17.455117 | 228.03856 
                      |     92.35       7.65 |    100.00 
----------------------+----------------------+----------
global warming is not | 32.117097          0 | 32.117097 
                      |    100.00       0.00 |    100.00 
----------------------+----------------------+----------
      other (specify) | .29400266          0 | .29400266 
                      |    100.00       0.00 |    100.00 
----------------------+----------------------+----------
                    5 | 17.525351  19.189217 | 36.714568 
                      |     47.73      52.27 |    100.00 
----------------------+----------------------+----------
                Total | 865.04402  565.95598 |     1,431 
                      |     60.45      39.55 |    100.00 

*/



